﻿Public Class FrmComboBoxEjemplo

    Private Sub ComboBox1_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles cbPrueba.SelectedIndexChanged
        lblIndiceSeleccionado.Text = "Indice seleccionado: " & cbPrueba.SelectedIndex
    End Sub

    Private Sub cbPrueba_SelectedValueChanged(sender As System.Object, e As System.EventArgs) Handles cbPrueba.SelectedValueChanged
        lblObjetoSeleccionado.Text = "Obj seleccionado: " & cbPrueba.SelectedItem.ToString()
    End Sub

    Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
        MessageBox.Show("Tick")
    End Sub
End Class